$title  textstrings and parameters for  CBIOS24  "TEXT24"       Date: 14/8-84
;
;
;
;       displaycontroller commands
;
        cr      equ     0dh     ;cursor to beginning of line
        lf      equ     0ah     ;new line
        erl     equ     04h     ;clear line
;
;
        etx     equ     -1      ;end of text string
;
;
public  text0,text1,text2,dlecnt,TEXT3,PTEXT,SIGNON,MODE
public  dpbase,trans,dpss,dpdd,ctb
public  rfunc,rmode,runit,rtrack,rsector,rdma,fmode,buf
public  begdat,enddat,datsiz,unit,pu0,pu1,punit,line
;
;
;       disk parameter header for disk 00
;
dpbase:
        dw      0001H,0000H
        dw      0000H,0000H
        dw      dirbf,dpdd
        dw      chk00,all00
;
;       disk parameter header for disk 01
;
        dw      0001H,0000H
        dw      0000H,0000H
        dw      dirbf,dpdd
        dw      chk01,all01
;
;       disk parameter header for disk 02
;
        dw      TRANS,0000H
        dw      0000H,0000H
        dw      dirbf,dpSS
        dw      CHK02,all02
;
;       disk parameter header for disk 03
;
        dw      TRANS,0000H
        dw      0000H,0000H
        dw      dirbf,DPSS
        dw      CHK03,all03
;
;       sector translate vector for single density
;
trans:  db      1,7,13,19       ;sectors 1,2,3,4
        db      25,5,11,17      ;sectors 5,6,7,8
        db      23,3,9,15       ;sectors 9,10,11,12
        db      21,2,8,14       ;sectors 13,14,15,16
        db      20,26,6,12      ;sectors 17,18,19,20
        db      18,24,4,10      ;sectors 21,22,23,24
        db      16,22           ;sectors 25,26
;
;       disk parameter block for single density
;
dpss:
        dw      26              ;sectors per track
        db      3               ;block shift factor
        db      7               ;block mask
        db      0               ;null mask
        dw      242             ;disk size-1
        dw      63              ;directory max
        db      192             ;alloc 0
        db      0               ;alloc 1
        dw      16              ;check size
        dw      2               ;track offset
;
;       disk parameter block for double density diskettes
;
dpdd:
        dw      52              ;sectors per track
        db      4               ;block shift factor
        db      15              ;block mask
        db      0               ;null mask
        dw      486             ;disk size-1
        dw      255             ;directory max
        db      0f0h            ;alloc 0
        db      0               ;alloc 1
        dw      64              ;check size
        dw      2               ;track offset (TRACK 0 never used)
;
;       diskette changed flag
;
pu0:    db      -1
pu1:    db      -1
;
;       current controlblock for diskette and harddisk controller
;
;                        diskette                  harddisk
;
ctb:    ds      2       ;status                    status
UNIT:   ds      1       ;unit number bin           unit
        ds      1       ;command parameter         command
        ds      1       ;track number              sectorl
        ds      1       ;sector number             sectorm
        ds      1       ;dma low                   sectorh
        ds      1       ;dam high                  nsector
        ds      1       ;                          dmal
        ds      1       ;                          dmah
        ds      6       ;                          reserved
;
;       requested controlblock
;
rfunc:  ds      1       ;requested function 0=read 1=write
runit:  ds      1       ;requested unit
rtrack: ds      1       ;requested track
rsector:ds      1       ;requested sector
rdma:   ds      2       ;requested dma address
;
punit:  ds      1       ;requested physical unit
;
rmode:  ds      1       ;current diskette density 0-single, 80-double
fmode:  db      0       ;current device flag 0-diskette,1-harddisk
;
line:   ds      1       ;line address in direct cursor addressing
;
buf:    ds      256     ;internal databuffer
;
;       scratch ram area for BDOS use
;
begdat  equ     $       ;beginning of data area
dirbf:  ds      128     ;scratch directory area
all00:  ds      61      ;allocation vector 0
all01:  ds      61      ;allocation vector 1
all02:  ds      31      ;allocation vector 2
all03:  ds      31      ;allocation vector 3
chk00:  ds      64      ;check vector 0
chk01:  ds      64      ;check vector 1
chk02:  ds      16      ;check vector 2 SS/SD
chk03:  ds      16      ;check vector 3 SS/SD
;
enddat  equ     $       ;end of bdos scratch area
datsiz  equ     $-begdat;size of bdos data area
;
;
;
dlecnt: db      0       ;direct cursor addressing flag (counter)
MODE:   DB      0
;
text0:  db      cr,erl,'BOOT CPM FROM UNIT (A-P) : ',etx
text1:  db      cr,lf,erl,'ILLEGAL UNIT NUMBER',lf,etx
text2:  db      cr,lf,erl,'DISKETTE ERROR DURING LOAD',lf,etx
text3:  db      cr,lf,erl,'DISKETTE DENSITY CHANGED',lf,etx
PTEXT:  DB      19H,11H,25H,25H
        DB      'SETT INN CP/M DISKETTEN I DRIVE A, OG TAST <CR>',ETX
SIGNON: DB      CR,LF,04H,'TDV 2124 MD CP/M LOADER VERSJON 2.1',ETX
;
        end
